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NOTES 


Wellington is certainly living up to its reputation re the 
weather this month - a severe cold rendered my magazine weekend 
rather less productive than usual. We seem to be going through 
one of the down cycles in terms of contributions also - still, 
I've only got another 29 pages to write... 


Has anyone been experimenting with graphics, writing games or 
working on hardware projects? Reviews are a bit thin on the 
ground toc - would anyone like to try their hand? I am 
interested in Users views about and experiences with new (for 
them) pieces of software or hardware. Short notes, such as that 
provided by Adrian (p31 May Beeblet) are also of interest. 


USER GROUP MEMBERS SPECIAL MASTER PRICE 


The special price for Masters offered to UG members is no longer 
available from most dealers. Jf you were planning to get a 
Master in the next few weeks then] suggest you epproach Barsons 
NZ Ltd (the Auckland based N2 Acorn Agent) directly. 


KITE FLYING - 


It has been suagested that in view of an apparent trend towards 
falling membership and the growth of loca] groups, the current 
national newsletter could be reduced tc a few pages despatched 
every two months. Programs etc currently published in Beeblet 
could be supplied to lacal] groups and interested individuals on 
disc. The sub would drop to say $5. 


COMING... 


- A beginners series 

- Using filing system commands 
- More hardware articles 

- More from Tony Krzyzewski 


RHELRAKKKERHKHEKHEERED 
Beeblet is assembled by Bruce Wills who can sometimes be found 
at 861-662 (home) or 729-929 x340 (work), 


DISCLAIMER 
The views of the reviewers, the Editor and ather contributors 
ati pO acest shared by the BBC/ACORN COMPUTER USER GROUP 
{ ). 
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REGIONS 
AUCKLAND: 


Now meet twice a month, on the second and third Wednesdays, at 
the Social Room (7) of Auckland Hospital, 7-30 pm. The next 
meeting in September is the AGM of the what is to be an 
autonomous group - ie the Auckland group is evidently planning 
to break away from the national group. 


DUNEDIN: 

I had a long talk with Martin McDowall who felt the Dunedin 
group was neglected by both the User Group and in terms of BBC 
sales and geben: generally. A number of specific problem 
areas were identified, including the supply and handling of 
contributions to Beeblet. These can readily be resolved. The 
other areas of concern relate to the mushroom syndrome: being 
Kept in the dark and... For instance, The Master was only just 
making its appearance in Dunedin. 


Unfortunately, Dunedin is not the only area to feel neglected. 
Similar feelings have been expressed in Wellington. 


The NZ BBC agents, Barsons Ltd, are based in Auckland. In past 
releases of new equipment, they seem to have experienced delays 
and or limited initial allocations. Having themselves been 
subject to the computer industry’s predalection for crowing 
about new products well before they have any hope of delivering 
them, they have adopted a policy of net widely promoting 
specific products until they believe they have a realistic 
chance of being able to deliver. 


Barsons are alse concentrating most of their promotion into the 
educational market where a high proportion of BBCs are sold. 
One should also remember that Auckland is a large, readily 
accessable market... Barsons have experienced some difficulty 
in establishing a nmetwork of qualified dealers/service agents 
throughout the country. | 


Anyway, to get back to Dunedin, the combined User Groups in the 
area are planning to involve themselves in « small exposition in 
early September. The emphasis will be on the home, and to a 
lesser extent, small business. | 
NELSON: 

There seems to be a very active local group of users with a good 
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selection of equipment and a wide spectrum of experience. The 
last communication I saw was from Richard Jack, who also 
mentioned the existance of a local (indepenent?) BBC/Electron 
Users Group. I would be happy to put a Nelson member’s name and 
telephone number on the back cover as a contact point : any 
volunteers? 


ROTORUA: 


An independent user group has been established in Rotorua. It 
ec first Tuesday of each month - contact Jan 85-583 or 
oan 81-536. 


TOKOROA: 


Three newsletters were delivered to me last month from the 
Tokoraa Acorn Users Group (April, May and June) together with a 
covering letter from the Secretary, Graham Robertson - just 
after Beeblet was sent off to the printer. At the rate local 
newsletters are set up; soon al) I will have to do is provide a 
central] clearing house... (see the note on Bulletin Boards..). 


Graeme reports that the group has seen a revival of interest in 
recent months, with 10 - 15 users regularly attending meetings. 
These range from beginners up to the new President, Bon Austin. 
Graeme also offered Beeblet access to their material. Further 
discussions with Graeme elicited that educational software and 
experimentation with a "buggy" (driven by the Beeb) was planned 
for 19 September, and probably something on diec filing systems 
for 3 October. A lot of people have recently aquired printers 
too.. 


WELLINGTON: 


I asked a recent meeting what sort of contributions they would 
like to see published in Beeblet. A short list was rapidly 
compiled: 


- a beginners series 

~ filing system commands 

- educational! applications 

~ business/industrial uses 

~ hardware projects 

~ special effects (graphics) 

- games 

~ a childrens page 

- how to produce a printout down the length of one or more 
pages, rather than across? 


99 999999999999 99999999999999999999999999999949999999999999 
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I then sought potential authors, with rather more limited 
success! Any other suggestions (subjects or authors) ? 


Forward Programme: 


Wednesday 10 September: — Pagemaker / Radio 
Thursday 9 October: Barsons?, ADFS / new products 
Wednesday 12 November: Printers 


(the October and November meetings could wel] be swapped around) 


Early December:  Videotex 
Late January: Education: Parents and Children 
Early February: Picnic 


HEKKHLALHELERRKHH EEE ES 
PROLIFERATING ACORNS... 


A recent letter from Barsons notes that since March i9¢3 they 
have scald in excess of 4,000 BBCs, 3,000 Electrans, and 350 
Masters (the latter since March 1986). And then there are all 
those which were imported directly.. 


HKKKKKKKLHEF LHF KKKKEEKKE 


Joe Joyce was recently at Canterbury University and had the 
opportunity to compare Acorn’s Cambridge Workstation with 
facilities available from a time sharing mainframe system. 
Those involved were evidently impressed with the Cambridge 
Workstation’s relative performance, and cast compared to the 
mainframe’s time charges for that one (large) Jjob.... 


$$¢F CONTEST !'! $## 


Beeblet will offer a prize of one box of 5.25" floppy discs or 
equivalent to theUser Group author submitting the best game 
program designed to be played interactively on two Acorn 
machines connected together with a seria) link (ie. RS432 or 
even the cassette port). 

Entries close at the end of November. 
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BULLETIN BOARDS 


The Auckland group’s Bulletin Board (running on a BBC) is 
apparently very active and is working very well - provision has 
even been made toa accomodate some interested Commodore users... 
The Bulletin Board can be accessed 24 hours a day on 390-836. 
oe format used is 300-300 baud, 8 data, 1 stop and no parity 
its. 


Meanwhile, the Wellington Microcomputer Society Inc is planning 
to setup a 24 hour Bulletin Board on an IBM XT (20 meq. hare 
disc) to replace the ome previously installed on the Vax Bryce 
Francis Ltd used to own. The machine has been ordered... The 
Saciety includes owners of a wide variety of machines, and thus 
the Bulletin Board can be expected to cater for a fair few. As 
it happens, the Editor’s Beeb may well be located in close 
physical proximity to the IBM micro... 


NEWS 


Locally manufactured MASTER series cartridges are now available 
from John Gilbert Electronics at $35-00 each. 


KKEKHLKKLKKEKKKKLKXKKHKKS 


MASTER Reference Guides Part 1 are currently being landed by 
Barsons. VIEW-SPELL is also now available. 


KEKFFKFKKREKRKRLHKRKRKLES 


MASTER owners may be aware of the problems experienced with same 
of the batteries fitted ta these machines - a few have been 
Known to overheat severely or even explode. This cam happen 
when the battery eventually runs down and the system in effect 
tries ta charge it up. The batteries are non rechargeable.. 


Barsons will soon announce replacement procedures - MASTER 
owners will be able to either install the appropriate 
replacement Bere themselves, or send their machine to Barsons 
(or a service agent?) 


HEEKKKKKKKHHHRRARKKKEE 
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FILE DUMP 
by BILL T. 


After having used a database program (Gemini) to create a file 
of records, I then wanted to print them differently to the 
Standard format used by the database package. But in order to 
write my own program to print the file it was necessary to 
discover the format of the file. 


The result is this simple utility program which will list a file 
ontc either the screen or my printer ({Logitec), im either byte 
format or in both hex & byte formats. 


Because some bytes may contain bit combinations which give 
screen or printer contro] codes, the program intercepts any 
bytes which are not in the range cf printable characters (i.e. 
ASCII cades 32 - 126) and replaces them with a fullstop. | 


The program has only been tested with files on tape, but 
Presumably would function identically with a disk file? 


EDITOR’S NOTE: Yes, it works on disc systems. This program 
provides a useful starting point for less experienced BBC users 
who are interested in learning about storing and retrieving data 
{as opposed to programs) on cassette. Start with Chapter 35 of 
the BBC User Guide... I] will arrange a further example of a 
similar program for disc systems, and perhaps the additional! 
advantages of the "random access" capabilities of the latter. 
Articles on elementry filing system commands are alsa in the 
pipeline. 


The ESCAPE Key and other “errors” are trapped using ON ERROR so 
that the screen can be returned to normal and the printer 
de-activated before the program terminates. 


PROCEDURES (in alphabetic order) 


PROCerror - 

calls the normal finish routine; prints the error message ied 
REPORT; resets the screen window to full screen (mot using VDU2 
because that puts the cursor at the home position) 


99 999999999999999999999999994999999499999999999999999949999 
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PROCfinish - 

closes the file; spaces the printer (if used) up 5 lines; 
restores output to the screen; turns off the printer; cancels 
screen paging 

PROCinit - 

obtains the filename & opens the file; ascertains if printer 
cutput and hex format are required; initialises screen/printer; 


outputs the two heading lines; sets screen window for output to 
the screen 


PROConecharac - 

handles one character as read from the file using BGET#; 
replaces a mon-printable character with a fullstop; adds the 
character or its replacement to the current line; converts the 
byte to hex format and adds it to the hex line 


PROConeline - 

initialises for a new line; tabs the printer; calls 
PROConecharac either & or 40 times to build up either a hex + 
byte line or a byte-only line; prints the line 

PROCscreenoff - 


exists only to satisfy BASIC requirements for #FX statements - 
in this case to direct output to he printer only 


VARIABLES 

INTEGERS 

C% - counts characters in the current line 
F% - file number, set by the OPEN 

1% - counter for FOR loops 

L% - number of bytes in each output line 
STRINGS 


B$ - holds the hex equivalent of each input character 


H$ - Yes) or Nio) for hex listing 
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IN$ - the character equivalent of the current byte 


P$ - Y(es) or Nia) for printer output 


filename$ - the name of the file to be dumped 


line$ - used to hold the byte string for the current line 


line2$ - used for the hex version of the current line 


NUMBERS 


IN - ASCII] version of current character. 


i0 REN #3 FILE DUMP #2 
20 REN 

30 REM 4% Version 1.0 #3 
40 REM by WA Tillick 
50 REN April 1986 
40 

76 MODE 7 

80 PROCinit 

9) REPEAT 

100  PROConeline 


110 UNTIL EOFACFA) 
120 PROCEinish 

130 PRINT’ CHR$(130) ; "FINISHED" 
140 VDU28,0,24,39,0 

150 END 


140 

170 DEFPROCinit 

186 REM------- - 

200 *0PT! 0 . 

210 INPUT "Enter File Name " filenames 
215 PRINT* Loading ea 

220 Fy= OPENUP( 41 lename$) 

230 IN=BGETECFY) s INS=CHRS (IND 

240 | ine2$=STRINGS( 24 ,"X") 

250 lines=STRING$(40 , "X") 


2460 PRINT’"Is printer output required 480 


(YAN)? *; 
270 REPEAT 


280 PS=GET$ 
290 UNTIL INSTR<*YyNn* ,P$) 0 
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_ 300 C0 


300 PRINT PS 

310 IF Pé="y® Pe=*Y" 

315 ON ERROR PROCerror | 

320 aa Hex listing required (Y/ 
N)? "3 

330 REPEAT 

240  HS=GETS 

350 UNTIL INSTR(*YyNn” HS) 0 

360 PRINT H$?’ 

370 IF Hé="y" HS="Y" 

280 IF HS="Y" LB ELSE L/=40 

390 IF PS="Y* DU2,1,27,1,64,1,27, 1,48 
$,15,1,0,1,9 ELSE CLS 

400 UDU3:PRINTCHRS< 129) :CHRE157) sCHRS 
C131) s:1F P$="Y" UDU2 

410 PRINT? 3o#% FILE DUMP 

id 


420 VOUL ,9,3:PRINTCHRS (130) s:1F PS="Y" 
VU? 
430 PRINT" FILE NAME = ":filena 


mes,’ 

440 IF $="Y" PROCscreenoff ELSE VOU 2 
8,0,24,39,4:VDU 14:CLS 

450 ENDPROC 


460 
470 DEFPROConel ine 


490 lined="":line2t="" 
LeonYinued 
ou p~se Al. 


310 IF PS="¥* VOUS 
520 REPEAT 


10 
EEE EEE See ee eee eee ee ee Tee Tee TESS PE PERE RE ERSTE ES 


NEWS - EDUCATION 


Mr Rob Bell (of Edmonds Nelson & Associates) has supplied the 
following notes on behalf of the Institute of Computer Based 
Learning, Auckland: 


A group of prominant educationalists and Auckland businessmen 
have joined forces to provide remedial and motivational teaching 
programs for use with micro computers. 


The development and marketing of the programs will be carried 
out by the Auckland based Institute of Computer Assisted 
Learning. 


The programs will cater for children between ? and 17 years, and 
will be financed under a special partnership which is soon to be 
announced. 


The software is being tailored for use in bath classroom and 
hame. 


It will be designed as an educational aid for al) children, not 
only those who need additional support or more motivation to 
learn. The gifted who need to be further extended will also 
benifit greatly. 


Editor’s Note: 


Evidenttly the ICAL programs will be launched for running on the 
BBC micro, and extended to the Apple 2c later this year. IBM 
compatibility will follow. 

A Melbourne based computer aided learning specialist, Mrs Liddy 
Neville, of Barson (Australia) Research Pty Ltd; is one of three 
experts “advising ICAL on how best to assist ‘at risk’ children 
to repair their damaged self esteem and give them the courage to 
‘have another ga’..". She has apparently recently talked to 
"educationalists" in Auckland about the scheme. 


I have a more detailed press release which cutlines these 
developments together with a summary of the briefing provided in 
Auckland by Mrs Neville and I would be happy to supply a copy to 
any interested members. 
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»-€GUCatIONal HELP wantedeseree 


I should also like to arrange a series of articles relating to 
the use of micro computers in NZ education (both home and 
school), a survey of available literature, software and other 
resources. This should include the experiences of various 
schools with BBC networks. 


I should like to hear from anyone with an interest in this area. 
The views of parents with an interest in home education (what do 
they want, have they found anything useful...7) 16 of particular 
interest, as well teachers and others involved in the wider 
eductional arena. 


Would anyone be prepared to co-ordinate such a series? I can 
provide an initial range of reference material and contacts: the 


only requisites for the job are: 
i/ interest 


2/ the ability to investigate, research and report clearly. 


Please contact me ithe Editar) if you are interested, or Know af 


someone who might be. 


530 = PROConecharac 

S40 UNTIL CZ=L% OR EOFRCFY) 

550 IF H$="Y" PRINT] ine$;TABC10) 3] ine2 
$ ELSE PRINT] ines 

540 ENDPROC 


570 

586 DEFPROConecharac 

59, REN------------- 

600 IF IN(32 OR IN 5126 linet=line$t". 
* ELSE lined=line$ ¢ INS 

610 8S=STR$~(ASC(INS)) 

620 IF LENCB$)=1 Be="0"+BS 

430 IF HS="Y" line2$=line2$ + BS +" ° 

640 Cé=CA41 

650 IN=BGETH(FA) : INS=CHR$CIN) 

660 ENDPROC 

$70 

680 DEFPROCfinish 

690 REM 

700 CLOSE#<FZ) 


750 ¥FX3,0 
766 VDUI5 
770 VOU3 
780 ENDPROC 


798 

800 DEFPROCscreenof 

B10 REM--------n n-ne 

820 VOUS:PRINT’ "Printing .. 

830 #FX3,10 

840 ENDPROC 

850 

840 DEFPROCerror 

870 REM--------- 

880 ON ERROR OFF 

890 REPORT 

995 IF P$="Y" PRINT" °; 
(129) 

900 PRINT# al line "sERL 

905 PROCfinish 

907 IF Pg="Y" PRINT"Interrupted by ... 

+ REPORT : PRINT 

910 yDU28, 024,39 ,0 

920 END 

930 ENDPROC 


contin sol 


Nou eae A P 


»* YDU2 


ELSE PRINTCHRS 
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AUTOMATIC SCALING OF GRAPHS 


Anton Erasmuson 


When plotting out araphs, one wants all the points to be on the 
page and spread out as much as reasonably possible. This can be 
achieved easily by using a scale factor equal to the available 
width/height divided by the range of values. However, if one is 
also required to mark each axis with ‘nicely’ judged steps, 
where mice means 1,2,3,4.. or as close as ane can get, then 
there is more of a problem. There is no strict mathematical 
solution as the problem is ill-defined. I have a solution here 
that makes the following assumptions: 


1) There are from 5 to 9 marks on an axis, and the minimum and 
maximum values le within or on these limits. 


2) ‘Nice’ means that steps of 2, 1; .5 or .25 # (some power of 
{0) are allowed. A step is the interval between marks. 


The algorithm solving this is given as PROCscale: the lines from 
"step = 4#,. to low?=4" are the essence of the whole program. 
The rest is really showing how it can be used. I’ve put it all 
together in a bit of a hurry so I camt be certain that it is 
bug-free. One problem that is still present is that long 
exponents (say {E412 or 3E-15) mess up the labling of the axes. 
That can be solved by dividing by a power of 10 close in size to 
‘step’. Figure it out for yourself as this is a hurried article. 
#%% Auto scaling for araphs.#% 180 ymin = point(),}):ymax = ymin 
a . es 190 FOR 14-2 TO NY 


3 

20 REM Anton Erasmuson, Aug’ 86 200 IF point<(3%,0) ¢ xmin THEN xmin 
30 = point(1Z,0) 

40 MODEO :3/=&409 :VDU29 , 240340; 210) «so YF point(14,0) > xmax THEN xmax 
50 N¥=50 = point( 14,0) . | 
60 DIM point(Ni,! 220) so JF point(34,1) ¢ ymin THEN ynin 
70 REPEAT : = point(iZ,}) 

80 CLs 230 IF point(}4,1) > ymax THEN ymax 
90 «= PROC fakedata = point(]4,1) 

100 PROCgraphdata 240 = NEXT . 

110 «wait = INKEY(1000) 250 PROCscale(xmin ,xmax) 

120 UNTIL FALSE 260 xlomlow: xscale=scale: xstep=step 
130 END 270 PROCScale< ymin, ymax) 

140 280 FOR 14=1 TON 

150 DEF PROCoraphdata 290 = PLOT 69, xscalex(point()/,0)-xlo 
140 MOVE960 ,0 :DRAWO , 0:DRAW 0 , 960 w) scale#(point(14,1)-low) 

170 xmin = point(1 0) sxmax = xmin 300 NEXT 


GoniinutdA on oss: \uy 
DDD IDI 999939999939 999999999 93999999999999993999999954399994 


13 
POPES O CEES SES OSO CSCS C CeCe eee eee eee eee eee eect 


ELECTRON POINTERS 
John B. Waiheke Island 
Editors Thanks: 


John, thank you very much for your letter and the sentiments 
expressed. These short contributions often more entertainment 
and, perhaps, edification, wan many a long disertion.. Over ta 
John- 


The little program enclose is very simple - the screen is filled 
with triangles of random size, in a random position and of 
random colour. 


To me the program illustrates the power of the Electron’s 
graphics - the program repeats itself and om each run changes 
the backaround colour with a FOR TO loop. GCOL RND(244), 
RND(COLOUR) determines the colour of each triangle with Boolean 
logic. The colours are prevented from flashing by the *FX?,0 
command at the start of the program. 


The program also illustrates how it is possible aes PLANES or 
FIELDS of colour on a two dimensional screen. The delay time 
set te slow down the plotting of triangles can be reset with the 
INKEY command to a time to suit the individual. 


1 find the program has therapeutic value. I dim the lights, put 
on suitable music and just sit back and relax. 7 


Ladies and Gentlemen, A TOAST 
"Here’s ta the genius of George Boole (1815-64), as Computer 
Users we must pay tribute to this remarkable man. 


10 REPEAT 
20 #*#FXF,0 
30 TIME=0 
40 MODE2 


50 FORc%#129 TO 135 

60 COLOURC% 

70 key=INKEY(100) 
CLS 


100 MOVE-400,350 

105. FOR o=0 TO 224 

110 GCOLRND(q),RND(U6) 
{30 x=RNDU279) 

140 y=RND(U4024) 
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150 PLOT 85 yxsy 
i55 Key=] NKE Y(50) 
NEXT 


ig0 
{90 NEXTc% 
200 MODE6 


210 PRINT TIME /6000" Minutes" 
220 key=INKEY(400) 
230 UNTIL TIME>10*6/6000 


(Listed using L.O? command). 
POPPE SELES PEELE CEL ESELEEEE SEALE TEESE 


ADS 


FOR SALE: 
Solidisk 64K sideways RAM 
Epson 40 Track DS disc drive 


Phane Andrew, Hamilton (071) 434-008 


Brother electronic typewriter (E P44). Battery cr mains powered. 
Also has serial input so it can act as a printer for a BBC 
Computer. Printer cable supplied. Hardly used. Price $350-00, 


ntact L. Crosthwait, Correspondence School, Wellington. Phone 


Co 
736-G4] 
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440 step = step/2 


310 YDUS 
320 FOR Wel TO 8 470 low = INT(p/step) 
330 Xv=xscalexstepsl/ 480 UNTIL g/step-]ow=4 
340 MOVE X4,0:DRAW X%,-20 300 scale = 960/step/CINT(g/step-] ow) ¢ 
350 MOVE X1-10,-25:PRINT STRS(xlowtx go) 
steptlZ) low = lowkstep 
360 Yeescalexstep#]y fe ENDPROC 


370 MOVE 0,Y%:DRAW -20,Y% 
380 MOVE-100,Y%:PRINT STR8(lowtsteps 940 DEF PROCfakedata 


1%) 30 REM rubbish in = rubbish out, eh? 
390 NEXT 560 LOCAL j,k 
400 VDU4 570 J=RNDG1) k= 10°C 49RNDC 15-1) 
410 ENDPROC 380 FOR TA = 1 TO NY 
420 590 poimt(T£,0) = CRNDC1)~j) 8k 
436 DEF PROCscale(p,q) 600 point(T/,1) = (RNDC1)—-j) ak 
440 step = 4#10*INT(LOG(q-p)) 610 NEXT 
450 REPEAT 620 ENDPROC 
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A Forum Conducted by Steven Rose 


Well, this month I’m using a different format ta see if anybody 
notices and comments. I¢ I don’t get any response at all, ! 
might do something diabolical next time. Perhaps 1/1) reverse 
the order of the wards in the whole column (siht ekKil ebyaM), or 
(instead this like). A WW+ program to do this shouldn’t be hard. 
YOU HAVE BEEN WARNED! 


Before I get to the problems, «a few words te these of you who 
think they might have something to send in, but wander whether 
it’s written well enough, or whether it might offend "purists", 


PLEASE SEND IT IN!!! 


Everybody who writes programs professionally looks back at those 
they wrote at the beginning of their career, and throw up their 
hands in horror. All it means is that we’ve learnt samething im 
the meantime. 


The only criticism that should be tlevelled should be 
constructive, with reasons. Preferably supported by a second 
opinion from somebody unknown by the criticiser. No program is 
erfect. I have never encountered a program that I couldn’t 
egitimately criticise, including my own. 


Statements like "Programs that aren’t structured are not worth 
looking at" are simply not true. 1 have one which is 
unstructured because it has to be (it corrupted the BASIC 
stacks), and is quite useful. | 


Programs with GOTO are perfectly okay, as long as the flow of 
the program is clear to someone seeing it for the first time. 
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Sometimes a GOTO simplifies things and makes the logic clearest. 
People who disagree should try writing a large COBOL program 
without using a GOTO! 


Finally, every program is interesting to somebody. Why did YOU 
write it ? Are your circumstances unique ? Are none of your 
ideas worth borrowing 7? Is none of your program unique ? 


PROBLEMS 


Qi. I’ve had two requests for help in getting T-DRAW2 to work 
with a disc system. The problem is that a BAD MODE error 
surfaces at line 100 or thereabouts. 


Q2. Bill Tillick, the author of T-DRAW, wants to be able to 
return to the line where an error occurred, when he has an ON 
ERROR statement in the program. 


Q3. John Jamieson has the automatic disc menu utility from 
Beebugq. He added a line that reads 


IF type%(A%)=2 PROCoscli("LOAD" + name$(A%) + 8000 + 7 + Q) 
The program later has “DEF PROCoscli(A$)" 
When he runs the program, he gets "TYPE MISMATCH AT LINE nnnn" 


SOLUTIONS 


Ai. T-DRAW2 is simply teo long to use in Mode 0, 1, or 2 when 
PAGE is set to &1900 (disc system setting). The solution is to 
delete al] comment lines and blank lines, and modify T-DRAW to 
read 


PAGE = &1500 : CHAIN "T-DRAW2" 


You may have to lower PAGE further, depending on how many REMs 
and blank lines you deleted. It is safe to use anything down toa 
&1200 with the current version, as it doesn’t use any OPEN... 
statements, which use RAM above 41200. 


This leaves room for about thirty names (variables or 


procedures) after allowing for procedure calls; which use 256 
bytes each call. | 


99999 9999999999999 999999999 9999999999999999999999999999949 
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A2. The simple answer to this appears in the U.G. on page 251. 
Simply say 
| variable_name = ERL 


You can then GOTO (horrors!) or GOSUB (yech!") variable_name. 


That was the good news (tongue now removed from cheek). The bad 
news is that an error causes the BASIC stacks to be cleared, 
which means that all procedures, functions, REPEATs, FORs, 
GOSUBs and READ statements are forgotten. 


This in turn means that if you GOTO the middle of a procedure, 
function, subroutine or FOR/REPEAT loop, you’ll get another 
error when you reach the end of the loop. There is no easy way 
to get around this, because the damage is done after the error, 
but before any BASIC statement is processed (e.g. in an ON ERROR 
statement). 


The only way to avoid this 1s tao use machine code. You can 
recover from some errors by intercepting the break vector and 
eee whatever is appropriate for that error (First buy the 
BASIC ROM U.G.). To avoid the problem for every possible errar | 
believe that you would have to use interrupts ta frequently 
fevery 50th of a second might be fast enough) save both the 6502 
stack and all the BASIC stacks, the heap, etc (except the 
variables which survive anyway). The idea being to save 
everything before each statement is executed. Then if an error 
occurred, you could restore everything and GOTO a line number. 
This method would drastically slow BASIC down: a Commodore 64 
would probably be much faster, assuming that you used sideways 
RAM or similar. | 


A3. The reason for this error is that PROCoscli expects a string 
to be passed to it. BASIC tries to combine ‘% "LOAD" +name$lA%) 
and succeeds. Then it finds a ‘+’, sa tries to add ‘8000 + 7 + 
Q’ which produces an integer result instead of a string, so you 
get the TYPE MISMATCH error. If you use ‘+ STR$(&000 + 7 + Q)’ 
you should have no problems. 


Well, apart from one hardware-related request thats stil) being 
looked into, thats all I’ve received this month. Keep them 
coming! 
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HE LF 


At a recent Wellington UG meeting Maurice Powell handed me the 
"Gridman” listing out of the August 1984 Micro User. He wanted 
to Know how this was done - could we print the program? Maurice 
also noted that Beeblet listings have the line numbers separated 
to the left of the program listing (even where the lines are 
folded) - do we use specia! software? 


Reply: 


For details of the Micro User software, see the July 1983 issue 
of Micro User - 1 can probably lend a to anyone interested (1 
don’t have a the Micro User program). 


Beeblet uses a program written some time ago by Tim Ryan. Tim 
avs it has one or two minor bugs still (1 think commas confuse 
it..), but the listing is as follows: «| seregs 


10 spc$=" "sHIMEM=&3000:*LOAD LISTCD 180 CHAN/=OPENUP (SOURCES ) 
E 190 1F CHAN/=0 THEN PRINT TAB(O,13 


20 ON ERROR CLOSEWO:VDU 3:1F ERR=17 A ) CHREI29;CHRSIS7 ;CHRS1G1 5" C 
ND INKEY-1 THEN END ould not find that file = "3C 

30 REPEAT HR$1563CHRS7; sDUMEINKEY< 200) :C 

40 FX 4,1 LS 

50 DU 22,7 200 = UNTIL CHANZ)0 


40 PRINT TAB(12,0)CHRS141;CHRS129;" 210 BRUNT Pe snk Lietingrheadieg? 
LIST ig : 
76 PRINT TAB(12,1)CHRS141 ;CHRS131;" 220 bat * Print line numbers? 
ié 8 


LISTER! 
80 «= PRINT TAB(14,2) CHR$131;"VERSION 230 ba > Statement/line (N/B/M/A) 
1.5" : 


90 PRINT TAB(4,4) CHR$129;"COPYRIGH 240 gat " New page for DEFs? 
1 BADGER SOFTWARE 1985* 
100 PRINT TAB(O,6) CHR$148;STRINGS(3 © 250 i! " Indent REPEAT/FOR loops? 


«9 CHR$240): | 
110 «FOR T=1 TO 16 260 PRINT " Number of indent spaces? 
120 PRINT CHR$148;CHR$181 ;CHRE1 34; 2" 


TAB(38,VPOS) CHRS148;CHRS234; 270 PRINT * Output to printer? 
NEXT 


430 . . Py . 

140 PRINT CHRS148;STRINGS(39,CHRSI463 280 ae line in printout? 
F. | | 

150 VDU 28,3,22,37,8 290 PRINT * Last line in printout? 

140 REPEAT END* 


170 INPUTLINE TAB(0,0), "Source #1} 300 PRINT * Width of output print 
ename : * SOURCES 80 


PVVIP IF II IF 999999949 9999499999999999999999999999999499999999 
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310 PRINT’*Set options then press (L990 
» to list" 600 DEF FNANS(al lowables$) 
320 = done=FALSE:] ines=TRUE:Bnewline=F 610 REPEAT 
ALSE:Anewline=TRUE:new.page=FALS 620 AS=CETS 
f 630 UNTIL INSTR(al lowables$+"L"+CHRS 
330 = hardcopy=FALSE:star t=0 send=0: tnd 13,A$) 
savete” "sheading= FALSE 640 JF As="L* THEN done=TRUE 
340 « width=B0:indent_Rs_Ns=TRUEs]ine= 650 IF done OR AS=CHR$13 THEN AZ=&87:A 
9 S=CHRSCUSR&FFF4 DIV &100 MOD &100- 
350 REPEAT 1) 
360 PRINT TAB(O ,VPOS) sCHRS15é: 460 PRINT A$; 
370 PRINT TAR(O,1ine+2) sCHRE131;TA 470 ans=FALSE 
B(28, 1ine+2): 680 IF AS="Y* THEN ans=TRUE 
380 IF line=0 THEN heading=FNANS(" 690 IF VALCA$)>0 THEN ans=VAL (AS) 
YN") 700 =ans 
390 IF Jine=i THEN lines=FNANS("YN 710 
*) 720 DEF FRLINP_NUMChighval) 
400 IF line=2 THEN newlines=FNANS( 730 REPEAT 
"NEMA" ) sAnowline=(Ag="M" OR ag 740 NUMS="":num_len=0inewval=TRUE 
="A") :Bnewl ine=(AS="B° OR Age" 790 REPEAT 
A*) 760 AS=GETS 
410 IF line=3 THEN new.page=FNANS( 770 IF A$="L" THEN done=TRUE 
"YN*) | 780 IF newsal AND AS<>CHRS13 AND N 
420 IF line=4 THEN indent.Rs_Ns=FN OT done THEN VDU 32,32,32,32,3 
ANSC"YN") 2,8,8,8,8,9:newval=FALSE 
430 IF line=5 THEN spc$=STRINGSiFN 790 IF ASCA$>47 AND ASCAS$(58 AND n 
ANS("0123456")," ") um_len<S THEN NUNS=NUMS+AS : PRI 
440 IF Jine=é THEN hardcopy=FNANS( NT A$; 
"YN") 800 num... } en=LEN(NUMS) 
450 IF line=7 THEN start=FALINP_NU 810 IF numien)0 AND A$=CHR$127 TH 
M(32767) EN NUMS=LEFTS(NUMS ,num.len-1): 
440 IF Tine=8 THEN end=FN_INP_NUM‘ PRINT A$; 
32767) 820 UNTIL AS=CHR$13 OR done 
470 IF Jine=? THEN width=FRLINP_NU 830 IF VALCNUNS$)>highval THEN VDU ?: 
M(132) PRINT STRINGS<LEN(NUMS) , CHRS8) ; 
480 IF tine<9 THEN Tine=linet+i ELS 840 UNTIL VAL<NUN$)<=highval 
E line=0 850 VOU 13 
490 UNTIL done 840 IF newyal THEN NUMS="O" SIF | ine=? 
S00 IF end=Q THEN end=32767 THEN NUMS=STRS(width) 
Si0 IF end<start THEN end=start 870 =VALCNUMS) 
520 #FX 21,3 880 
530 PROC_DOLLIST 890 DEF PROC_DO.LIST 
Soe done=FALSE 900 VOU 22,0 
340 = PRINT ’’’’*Do you want another | 910 illegal=TRUE:LAST=FALSE 
isting ? (YAN) fj 920 IF hardcopy THEN VDU 2 
990 UNTIL FNANS( "YN")=FALSE 930 IF heading THEN PROCheading 
560 #PX yt 935 PRINT CHRS13;CHRSiO; 
570 MODE 940 PTRACHAN/=1 :assembl y=FALSE :quoteto 
980 END ggle=FALSE:indent$="_":rem=FALSE 
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62 beatye!=BGETNCHAN: 

970 REPEAT 

980 Vinenunt=STR$( tes tual #256+BGET 
#CHANZ) 

999 1 ine_length=BGET #CHAN, 

1000 JF VALTinenum$)=start AND VALI 
inenum$(=end THEN i} ]egal=FALS 
E 

1010 IF VAL{]inenum$) end THEN ille 
gal=TRUE :LAST=TRUE 

1020 IF illegal THEN PTRACHAN/=PTRH 
CHANA+] ine lenoth-3:testval=B6 
ETHCHANZ | 

1030 UNTIL LAST OR NOT i}legal 

1040 JF LAST THEN GOTO 1260 

1050 JF NOT lines THEN linenumé=" * 

1060 REPEAT 

1070 firstchar=BGETHCHAN, 

1080 UNTIL firstchar<)32 

1090 «oF firstchar=&DD AND newpage TH 

EN YDU 12 
1100 © PTRYCHAN=PTRACHAN,-1 


1110 
1120 


1430 
1340 
1136 
1160 
1170 
1180 


1190 


1200 


1210 


1220 
1230 
1240 


‘PRINT RIGHTS<" 


*+]inenum$,9); 

IF NOT assembly OR Cacsembly AND 
firstchar (SASC*." AND firstchar 
4DASC*\") THEN PRINT indent#; EL 

SE PRINT " "3 

IF ¢irstchar=ASC*#" THEN rem=TRU 


E 
REPEAT 
char$=CHR$( BGETACHAN,) 

JF chard=CHRS&F4 OR (char$="\" 
AND assembly) THEN rem=TRUE 
IF char$=CHR$34 THEN quote togg 

Te=NOT quotetoggle OR rem 

IF char$=CHR$13 THEN quote toga 

1e=FALSE :rem=FALSE 

IF char$="{" AND NOT see 

gle OR rem) THEN assembl y=TRU 

sindsaves=indent$: indent$=STRI 

N6$(11," ") 

IF chard="3* AND NOT buat. 

gle OR rem) THEN assem; y=FAL 

FE: indentd=indsaves | 

IF NOT assembly THEN PROC_CHEC 

K_INDENTS(char$) 

PROC_PRINT_CHAR( char$) 

UNTIL chars=CHRS&0D 
testval=BGETHCHAN, | 


GZOonTiIVuk!t See 


~ 1230 


IF testval)127 THEN LAST=TRUE 
1260 UNTIL LAST 

1270 CLOSEWO:VDU 3 

1280 ENDPROC 

1290 

1300 DEF PROCheading 

1310 PRINT * "sSTRING$¢width-4,"#")/ 
1320 PRINT TAR(width DIV 2 - LENSOURCES 
s:MDU 1,14:PRINT SOURCES’ :VDU 1,1 


1330 PRINT "  "sSTRING$(width-4,"#") 

1340 ENDPROC 

1350 

1360 DEF PROC_CHECK_INDENTS<char$) 

1370 char=ASC(char$) 

1380 IF (char=&&3 OR char=&F5) AND inde 
nt_Rs_Ns THEN indent$=indent$4spc$ 

1390 JF (char=&ED OR char=&FO) AND inde 
ntRs_Ns AND LENCindent$)>1 THEN j 
ndent$=LEFT$< indent$ ,LEN( indent$)- 
LEN(spe$)) 

1400 ENDPROC 


1440 

1420 DEF PROC_PRINT_CHAR‘ char#) 

1430 colon@K=charé=":" AND CCNOT assemb 
ly AND Bnewline) OR (assembly AND 
a AND NOT (quotetoggle OR 

ren 

1440 IF char$>CHR$&7F AND NOT quote toog 
le THEN char$=FA_GET_ TOKEN NAME 

1450 FOR print=1 70 LEN(chars) 

1455  endF=FALSE 

1460 = posit=COUNT MOD width 

1470 = IF posit={i THEN endF=TRUE 

1480 «oF ¢¢endF OR char$=CHR$13) AND w 

$dth<{132) OR colonOK OR (NOT end 

F AND char$=CHR$13) THEN PRINT ¢ 

HR$13;CHRS10; 

IF endF AND NOT{colonOK OR chars 

=CHR$13) THEN PRINT ° *einde 


nt$: 
IF colonOK THEN PRINT ° "sind 


ent$; 

IF char$<{>CHR$13 AND (char$(>":" 
OR NOT assembly OR rem GR Anew] 
ine=FALSE) THEN PRINT MID${char$ 
sprint,i); ELSE JF char$=*:* THE 

N PRINT " ": 


1520 NEXT 
1530 ENDPROC 
PAGE 23 


1498 


1500 
1510 
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USER DEFINED KEYS 
EDITOR‘S NOTE 


Please excuse the cobwebs on this one. The Centaur submitted it 
last year, but unfortunately there was a bug in the KEY 2 
definition (typing error’). rarely get time to debug listings 
during mag preparation, and put this in a safe place for future 
action... My profound apologies to the Centaur. 


The Centaur writes: 


For this issue of beeblet I] have included some things to do with 
your user defined function Keys at the top of the Keyboard. 
First, a bit of technics. If you have a HiRez monitor, you will 
apreciate the value of "#TV 0,1" command. Unfortunately this 
does not work in Mode 7. The Advanced User Guide suggests that 
the statement 


"VDU23;8,14450;0;0,2359,9;0;0;0,23;10,9;0;00iM" 


be used. Unfortunately this does mot work in Mode 7; sa it 
deserves its own Key definition: 


*#KEY 3 VDU23;8,144;0;0;0,2359 9;0;0;0,23;10,9;0;0;0:ML.INIM 
Great for word processing, and listing programs. 


And speaking of listing programs, one Key ] have ALWAYS defined 
the same way is KEY 0 to list a program in Mode 7 with paging 
on: 


*#KEY 0 L.O7;V7iM 


Which is basically saying LIST 07 (indent FOR/NEXT, REPEAT/UNTIL 
loops), change to MODE 7, turn on paged mode, and list (although 
not necessarily in that order). Both of the above Keys can be 
combined into one so that the display is listed stably: 


#KEY 0 L.O7}V?7iM 
VDU2338114450;0:0.2339,95050;0,23;10,9;0;0,0;ML.INIM 


If you are doing assembler work, it is useful to define KEY 10 
as OLD to retrieve your your program if, like me, you fault find 
by letting your program crash, thus locking the Keyboard: 

*#KEY 10 OLDIM 


999 P9999 999999999999 999999999999 9994999999 9999999999999999 
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And finally I have a short assembler program to turn KEY 2 into 
@ decimal te hexidecima)] or binary converter. After running the 
program a lot of garbage will appear followed by a question mark 
on the next line. Enter a decimal or hexidecimal number and hit 
return. The binary equivalent will appear on the next line. If 
it doesn’t, and the Keyboard appears to lock up, hit BREAK 
(which by now has been defined to OLD your program), and recheck 
that you have entered the program correctly. 


The programme is assembled at the top of the Key Definition 
memory, so that as long as a CTRL BREAK is not done, it should 
Survive as long as the rest of the Key definitions. 


Happy Hunting 
The Centaur 


Program rundown: 


Line: 10.....-Sets up KEY 2 toa input a number DF Cif its 

Hex it converts it to decimal>, place it 
im & location that the converter program 
can tind, and then call the proqram. 

ZG..6.. Telis the assembler to assemble the 
proaram at the tap af the Key Definition 
memory. 

30.....Enter the assembler. 

40.....Assembler Option : 

eerie: Sere the number of bytes ta convert. 


kbar 7 up loop to convert each of the seven 

its 

70....,LcGad A with the Ascii cade for "OG" 

B0....-ethis shifts the bit we are converting ta 
the carry flag 

90.... Add the value in the carry flag onto A. 
If the number in the carry flag was zera 
then @ Keeps the Ascii code for "OQ" 
otherwise & takes the Ascii code for "1° 

100.....Jump ta the Operating System routine to 
send the value in A to the screen. 

110.....Decrease X 

120.....1¢ X>0 then we still have some bits toa 
da. 

130.....Print a carriage Return 

140.....End of the subroutine and re-enter 
BASIC. 

{50....,Exit the assembler 


PVPFIPIFIIIIF III PPI IIIA IFPI III F949 9999999 999999999999 9999 
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The listing: 


10 #KEY2] D$: 2UBFFEEV, D$: CA .&BECIM 
20 PA=&BEC 

30 [ | 

40 OPT 7 

00 LOX 7 


100 JSR &FFEE 


110 DEX | 

120 BPL BINLP130 JSR &FFE? 
140 RIS 

130 J 


re -et147TE QR” Conrkinuends ee 
FT A4¢ Lo. 

1540 

1550 DEF FALGET_TOKENLNAME 

1560 AY=ASCichar$) 

1570 X4=&71 :Y7-&80 

1580 JF AZC>&BD THEN CALL &900:chard=$& 
942 ELSE char$=FN_GET_LINE_NUM 

1598 JF Av=&B0 THEN chard="A"tchar$ 

1600 =char$ 

1610 

1620 DEF FN_GET_LINE_NUM 

1630 REPEAT 

1640 char$=CHRS<(BGETHCHAN,) 

1650 UNTIL chard<>* * 

1660 =STR$((9-ASCchar$ DIV 16) MOD 4244 


+BGETHCHANA- 64+ (BOETSCHANA-64)#256 — 


“~Exrstcve 


28804 ERRORtEVALPOS Spr PLT o00 PAGER 

EPORTGCOL qLGETpERRORP GET GERRORSG 

ETpPAGEAUT OgAUTOpPOSpRENGETr 8GOT 

: ERRORr EVAL POSpATN' LOADSTRINGS( 
GEREPORTLEN 
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MASTER MATTERS 


Neil Gordon 


Now that my Master has finally arrived - via surface mail as it 
turned out - I have been having a good play with it and 
gradually converting all my disks aver from DFS ta ADFS. This 
is the first of what I hope will be a number of columns dealin 
specifically with good ways of making use of the additiona 
features of the Master, and answering any enquiries you might 
have - send in your questions to me, care of the User Group. 
(Any concrete suggestions on how Barsons should be promoting 
the Master will also be welcome. I wonder how Tim is getting 
on ~ hope he doesn’t lose his CHAIN again. 3 


First, though, I encountered a problem with my Master which had 
me very baffled (and worried) far a couple of hours until it was 
tracked down. It is worth describing in case anyone else should 
encounter 2a similar yee ee a What happened was that if I 
pressed SHIFT or CTRL in combination with any other Key, the 
computer would ignore it. J] immediately suspected the keyboard 
and dismantled the computer to have a look at it, but could find 
no obvious problem. Furthermore, the computer was obviously 
dts Haetadt the SHIFT and CTRL Keys since holding them down 
together did stop listings to the screen as it is supposed to. 


When ] turned the computer back on, it wouldn’t boot up in ADFS 
as it was supposed to, but insisted on coming up in the TAPE 
filing system. This made me suspect that the operating system 
ROM might be at fault. Then 1 remembered that pressing a Key 
when the system boots will make it come up in a different 
filing system - for example, A + BREAK gives the ADFS, D + 
BREAK the DFS, 7 + BREAK supposedly gives the DFS but with $271 
emulation (777), and T + BREAK gives the TAPE filing system. 
What if, on booting the computer thought there was a key 
pressed that made it switch to TAPE rather than ADFS.  / 
immediately wrote a short program to use the operating system 
to see what Keys were being pressed and discovered that it 
thought the ESCAPE Key was down all the time!!! EUREKA!! 1 
prised the Keytop off, fiddled with the switch « bit, then put 
the Key back again and al] was well, thank goodness. I didn’t 
relish the prospect of sending the computer back to Britain or 
paying to have it repaired here. 


Another fault that my Master had was that the SHIFT LOCK Led 
wouldn’t come on. xamination of the Keyboard printed circuit 


99949 999999499999999949999999999499999994999999499949999999999 
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board showed a dry solder joint - one of the Led pins was quite 
loose. A bit of extra solder cured it. JI have heard of this 
happening on several other Masters, too. 


Now for some hints and tips on the Master, some of which have 
arisen from questions from other new Master owners. Remember - 
send yours in and 1/1] try to answer them. 


The first point concerns backing up the WELCOME disk. This is 
@ special 40/80 track format disk. In effect, the information 
is stored in 40 tracks om one side of the disk, and &0 tracks 
on the other. The basic catalogue information is on the first 
track of the first side, soa can be read by either sort of drive. 
40 track drives will just read the one side, and work perfectly 
well. However if, like most of us, you are using 80 track 
drives, you will] CHAIN "WELCOMES0" to convert the disk to 80 
track format. This works by changing the catalogue. 
information to point to the other, 80 track, side of the 
disk. Clearly, you cannot use the ordinary ADFS backup utility 
te back up this disk, since the 40 track side will not be read 
properly, Instead, use the copy directory utility to copy 
everything, starting from the root directory, to another disk. 


Be careful when using the EDITor on BASIC es ie If you put 
in a new line, or edit an existing one, so that it is longer 
than 255 characters then when you return to BASIC the program 
will be last from that point on, WITHOUT TELLING YOU!! Aside 
fram that, it’s brilliant to switch between BASIC and the EDITor 
~ even better than my old system using WORDWISE which was only 
in 40 columns. 


Speaking of WORDWISE, the latest versions of WORDWISE PLUS will 
work perfectly well on the Master, and make use of the shadow 
memory to previewin Mode 0 even when there is a large amount of 
text in memory. Older versions may work as well (though without 
using the shadow memory) provided you ensure that the byte 
stored at location &8006 is &C2 and not &&2. (Bit 6 should be 
set to indicate that it 1s a language. This trick will also 
work on COMMSTAR ta make it run on the Master.) For myself; ] 
now prefer to be able to edit in 80 columns and will be sticking 
with VIEW for the time being - I am oradually learning its 
idiosyncracies. | 


You probably Know that you can switch to a different directory 
on the ADFS by giving enough characters to identify it, followed 
by the * wildcard. 


PPAADVIVIIIIIPIII IP IAAI 99999999 99999949999 99499494999949999999 
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For instance, if you have subdirectories GRAPHICS and GENERAL in 
the root directory, you can use the command *DIR GR# to move 
into GRAPHICS. It turns out that this trick will work with 
file names as well. If you have programs CIRCLE and PICTURE 
in GRAPHICS, then CHAIN "C#" will be sufficient to run CIRCLE. 
These could be put toge ther - from the root directory the 
command CHAIN "GR#.C#" would also run the program. Isn’t that 
nice? 


Finally, anytime you give an operating system command you can 
temporarily switch to a different filing system for the duration 
of the command. This is dane by putting the file system name 
between hyphens just after the *. For instance, if you are in 
ADFS on drive 0, the command *-DISK-. will catalogue a DFS disk 
on drive 3. The filing system type cam also be put in front of 
any filename. 


That’s enough for this month - next time 1/1) tell you how to 
automatically date stamp a BASIC program whenever you save it, 
and how ta double the MODE 0 screen resolution ta 640 by 400, 
plus answer any questions you might have. 


EEE bebe h bebe b bbb bbb bbb bbb db bb bbb bddbbddddliddisids 


LAST CHANCE! 


moreR AM inth}e BLE CTRONS 


After much waiting, the odd exam, a baby son, and general 
experimenting. The Electron 32K sideways RAM board will immerge 
like no other hardware product has before. (Not that 1 could 
pin-point the difference. 


The price looks like being just over $100 dollars now. This is 
affected by how many we can make, so if you leave your enquiriry 
till next week, it might cost more. For more information, write 
to: 

Electron RAM board 

Steve Cosgrove 

C/- BBC/Acorn Computer User Group NZ IncP O Box 9592 
WELLINGTON 

OUICKLY! 
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Electrom Column 


Steve Cosgrove 


The advantages of normality come up again this month. The 
‘standardised’ operating system within the Acorn computers 
allows some hardware items to be shared. This includes not only 
‘standard’ things like monitors and printers, but also many ROM 
based programs, as I have said before, and Cartridges in the 
Electron and Master. Two other hardware add-ons talked about in 
the Electron Advanced Users Guide, but not common in New 
Zealand, are Seria) (RS$423) interface, and Second Processor. 
This month I will present a basic introduction to each. 


Most computer users will add a printer at some stage. The BBC 
has two sackets which can be used for the purpose. Which to use 
depends on the type of printer. Electron PLUS ONE users have a 
‘Centronics Parallel’ socket, but not the other, (RS423 serial). 
Parallel printers need a large number of wires going from the 
computer to the printer. Eight of these are used ta send a 
character along. On the other hand, a serial primter only needs 
2- 5 wires. In this case the ‘bits’ of a character are sent 
one after the other. As electricity travels at the speed of 
light, this transfer doesn’t take very Jong, but 1s slower than 
parallel, and generally less popular for printers. However, for 
two-way communication, serial is far more popular, as, with 
fewer wires to worry about, there is more chance that the 
computers will be happy to communicate. There is a popular 
serial interface called RS232, which is totally compatable with 
RS423, | 

Earlier this year there was much talk in Beeblet about the 
‘Volksmodem’. Modem stands for ‘MOdulater, DE Momulater’ which 
does not help most people. Basiclly, two of these allow two 
computers to talk to each other via the telephone system. 
Obvicusly the serial interface must be used for this, as there 
are only two wires which the system can use. There are a number 
of plug-in cartridges available from England which give an 
Electron the RS423 capability. We hope to have some details on 
these in the next Beeblet, otherwise, write ta the User Group, 
oe we can send you details, but please enclude 45c return 
postage. 


The other hardware addition I have heard about lately is a 2nd 
Processor. , 
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The BBC range (inc Electron) have, as the central ‘workhorse’ or 
processor, one ‘6502’. J] have written other articles about how 
the Electron is slowed down by having this one processer to do 
everything. The capability has always been within the Electron 
to divide up the work, by using another 6502 attached through a 
PLUS ONE socket. Now two companies seem to be supplying the 
neccessary bits to make this a reality. ‘Advanced Computer 
Products’ of Surry, England, have been advertising a cartridge 
which allows, among other things, an Acorn 2nd processer to be 
plugged in to it. The add was in April ‘86 Acorn User, and has 
been other places too. Unfortunatly this is rather expensive, 
as the 2nd processor costs about $600.00, then theres the extra 
board to send to England for (if it is available yet). A far 
cheaper alternative was a 2nd Processer which I have not seen 
advertised, but which was the subject of an artile in April’s ‘A 
& B Computing’. Its title was ‘Electron GT’, so no BBC users ] 
have talked to actually read it ~ foolish pecaple. Not only is 
this board only a fraction of the price of the Acorn product, 
(about 70 pounds complete) but it comes with instructions for 
use in a BBC BR. (Probably works in the Master toc!) I have 
sent to Wales; asking for more information. Watch Beeblet for 
details when I have more to say about it. | 


Please write soon! 
Luv Steve 
Odds and ends 


] have reliable information that the Nightengale Modem (nat 
approved by NZ Post Office) works fine with the Electorn RS423 
cartridge which comes free with it. All-up cost? 11% pounds. 


‘Electron User’ (an English magazine) is appearing at random 
bookstands around Wellington. Someone even spotted ane in 
Whitcoulls - proably the best support they have for the 
Electron. 


Speaking of that enchanting magazine (second only to Beeblet for 
execllence (if not spelling)) it featured a review of a magic 
littie board which seems to make an Electron do everything as 
fast as a BBC B. Price was about 30 - odd pounds, but you have 
to unsolder some chips yourself - YUCK! 


Only ONE reply to the RAM/ROM board so far, and ONE other letter 
in toto - sometimes I wonder if anyone other than my wife reads 

this column (and she,only to correct the spelling). Or maybe JI 

am writing the wrong things - please tell me. 
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And finally, in relation to that, Gordon & Donella, I have a 
board with you could have, but there is a catch, I will write 


when I have time. Thanks for yaork 
GEESE EEE Ese bye bee ebb bbb bbb ssbb sees esd bbb ddd sss dbssetdeee 


WELLINGTON: IN FROM THE COLD? 


Neville Hudson; currently Vice President of the User Group 
announced at the August meeting that he had been appointed as a 
Barsons (Acorn) dealer in Wellington. Plans were in hand to 
establish premises in which both hardware and a full range of 
software will be displayed. This is good news for members in 
the light of the appaent decline in interest in Acorn products 
evident in some commercial quarters. 


LEALKAHKHAKHKEKHKHE EERE 
VIDEO DIGITISER 


Adds have become a rare event in Beeblet : Perhaps its time for 
another major campaign? Anyway, included this month is an add 
from John Curtis of Hawkes Bay for a Video digitiser made by “a 
friend and JI". John notes in his covering letter that the 
digitiser "is very cst effective” as far as digitisers gc. The 
software is top quality and includes the digitiser program, a 
picture cropper and a useful BASIC pracedure allowing you to 
display a cropped picture anywhere on the screen." 


KHRKKKKKKKERRKEERKKEHKRER 


NEW ACORN BABY 


According to the latest Micro User, Acorn are about to launch a 
new little BBC, bundled with monitor and a 3.5 inch disc drive, 
for 500 pounds. Interesting.... of too late? 


CONTRIBUTIONS - 


I am always grateful to receive contributions in whatever format 
(BASIC wordprocessors through VIEW) is convenient to the sender. 
I use Wordwiset+ and in the case of tape or disc contributions, 
usually just load them and if necessary delete any foreign 
embedded codes. The fewer of these the better, especially if a 
VIEW file that has been right justified and then spooled... 
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IS IT ON VIDEO? 
THEN PRINT IT? 





— —— 








Digitises Modes 8 and 4 
Scans in 1.5 seoonds 
Compatible with AMX Pagemaker 
Comes with picture cropper 
Great for school newspapers 


Display picture anywhere on the screen 


froma BASIC 
Fa Re a ce a are et 





Fron sta rdegi so. recor 4 
ron. stander gidss ot T cluded: 


Weite to: ret sSe“ns ERS" "* 


He pay for postage anywhere in HZ. 
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OF MICE AND BUGGIES 


Reading through issues of the Tokoroa Acorn Users Group 
Newsletter 1 found series on "mice" and "buggies"(or "turtles" 
construction and software. I will take up Graeme Robertson’s 
offer of material on this one, provided the authors of the 
articles are agreeable. 


A "“bugoy",or “turtle” is a mechanical beasty usually tethered 
via a cable to the Beebs user port. Under the control of the 
Beeb it is able to explore the outside world. Some of you may 
recall the review of six of the creatures in the November 1984 
Acorn User. 


A "micro mouse" is a little more independent - it has been 
defined as "a miniature self contained robot, usually contrelled 
by a micro-pracessor... * designed ta find the quickest path to 
the centre af & specially constructed Maze. 





#From a handout produced by the Wellington Microcomputer Society 
at the time of their maze and micromouse exhibition at the 1983 
NZ Computer Conference. See Beeblet, July 1983, piz. 
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At some stage in the past I mentioned something in Beeblet 
about the Wellington Microcomputer Society’s micromouse maze, 
and little "daisy" mouse. 


Well, the maze still exists, as does the literature the Society 
collected relating tc mouse construction, plus the rules for a 
micromouse competition, derived from those published in 
Practical Computing, April 1982. There might even be a few 
traces of maze paint in my "Spare" bedroom! 


The first Micromouse Contest was held in the US by IEEE 
Spectrum, followed by similar contests in the UK and Europe. 

The problem with getting such 2a competition off the ground in 
N.Z. was finding interested people with both the time and 
competence to build and program such a beasty. At the time the 
Wellington Microcomputing Society was actively promoting such a 
contest, consideration was given to different classes of beasty 
(eg. cantrelled remotely by a pre-programmed micra), and avenues 
of competition other than maze solving. Although a lot of 
interest was expressed, only one mouse actually got built. 


The maze consists of 16 by 16 squares. The squares are based on 
a iSOmm (7 inch) matrix. The walls are i2mm (0.5 imches) thick, 
20mm (2 inches) high and painted white with red tops. 
Passageways are 168mm (6.5 inches) wide. The 25mm (1 inch) 
square target post at the centre is 200mm (& inches) high, and 
can be removed if desired. The "starting square” is at the 
"bottom left” corner of the maze, and the mouse is initially 
orientated so that its target is diagonally to its right. The 
running surface is fine chipboard, coated with matt black paint. 
Tolerances may well be out by 3% however, and the walls are not 
strictly continuous because the Wellington maze uses sections of 
dowell plugged into holes drilled at each corner of the 
intersections of each of the 146 squares to retain the walls (so 
that the maze can be readily reconfigured). 


The maze and mouse are trotted out and demonstrated from time to 
time. If a number of groups are interested, the Society would 
certainly be interested in reviving some form of mouse / buggy 
/ turtle and/or related software competition. They might even 
be able to raise sponsorship... 


It would also be relatively easy ro create a software maze to 
test the relative efficiency of maze solving software. 


Drop a line to Beeblet if you are imterested in either a 
micromouse contest or a maze solving program (software mouse / 
turtle or whatever). 
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& FATE WORSE THAN DEATH 


Tony W. Napier 


You'll have read in the July Beeblet, 

How girls and computers don’t mix. 

Well Lve lost my computer AND girlfriend, 
Is that not a terrible fix? 


Sue was the girl, and her hair had a cur}, 

Like a telephone cable, but brown. 

Her fingers had strength, and just the right length, 
For pressing word processor Keys down. 


Her cheeks were as red at the Beebs function Keys, 

Her teeth were like white microchips. 

Her eyes were like green VDUs with the brightness at ‘2’, 
A sine wave was the curve of her lips. 


I conceded defeat, that she rivalled Elite, 
Until one night when she called. 

I was trying to write a utility, and 

Thad to admit I was stalled. 


She stood by my chair, I was in despair, 

Machine code ideas I had none. 

Then she reached out her hand, "Don’t do that” I cried, and 
She pressed BREAK and my program was gone. 


I ranted and raved, it couldn't be SAVEd, 

My face and my neck were quite red. 

Now when she calls, SHE plays with the Beeb, 
And 1 oo and play football instead! 
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Confidential to Members. 
11 August 1986 


DISCOUNT STOCKS 


We are currently holding stocks as follows:- 


Disks (box of 10) 3M DSDD 5.25" $45.00 + $3.00 pp 
: 3.3" $85.00 
Tapes(packet of 20) Tracer C10$30.00 + $2.00 pp 
Tape(New Member)  &M] C30 $5.00 3 
Paper fan-fold M& P 3i40/1 $5.00 + $1.00 pp per 200 sheets 
Beeblets Vol | 3,6,10,11 $0.50 each 
: Vol 2 all except May $1.00 each 


; Vol 3 al} $1.50 each 
; Coping out of stock issues $3.00 each 
Special | 


Two complete sets of volumes one and two Beeblets have just been located. These 
are available at $15.00 per volume. 


Beeblet Covers Pre-V-Dex(2 Vols) $4.50 
Printer ribbons Logitec loops $10.00 
' Ink 100 m} bottle $10.00 


Wellington members these are available at both monthly meetings and workshops. 
For other members postage will be arranged on receipt of your cheque. 


BULK DEALS 


Bulk deals will again be arranged in September. Initial orders are received 
without payment. You will be asked to confirm your order in September at which 
time a firm price will be available, and goods will be available on receipt of 
payment, Freight is payable on al] goods for out of Wellington members. 


Printers Solar 120EX $635 
Cables  %30 
Disk drives Teac FDSSFV 80 Track double sided, 
Twin drives case & cables 40 
Single drive case & cables $420 
Bare drive $350 
Cables $30 
DFS $265 
Monitors monochrome 
| Mitsubishi SV1290 $250 
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SERVICE AGENTSAND DEALERS 


The NZ network of service and dealers for the 


follows: 
AUCKLAND: 


Sales and Servicino- 
Barson Computers NZ | td, 
1 Noaire Avenue, 
Auckland .3. 


John Gilbert Electronics, 
75 Parnel Rise, 
Parnell. 


Other Dealers- 
Computer Terminal, 
Kinemoa St 


Nei! Gladden, 
Data Base Services, 
8 Kowhatu Ro 


Whitcoulls Ltd - 
186 Queen St 
312 Broadway Newnarket 


BLENHE IM 


Whitcoulls itd, 
30 Market Street North 


CHRISTCHURCH: 


Sales and Servicing- 
Aftron Computers Ltd 
161 Barbados St. 


Dealers- 
TW Enterprises Shop, 
P.O. Box 1945 


Whitcoulls Ltd- 

111 Cashel St 

Canterbury Centre, High St 

201 Manchester St, 
DUNEDIN: 


Whitcoulls Ltd, 
143 George St. 


HAMILTON 


Whitcoulls Ltd. 
475 Victoria St. 


ph. 504-049 
504-631 


ph. 419-053 


ph. 778-329 
ph. 543-129 


ph. 88-039 


ph. 797-445 


ph. 794-580 
ph, 50-159 
ph, 787-54! 


ph. 774-120 


ph. 82-174 


INVERCARGILL 


Whitcoulls Ltd, ph, 


66 Dee St. 
SOUTHLAND 


h. 
ph. 390-839 thets NcEntee, p 


comp, 
P.0. Box 255, 
Gore. 


TARANAK ] 


Winston Electronics oh, 


26 Berwyn Ave, 
TAURANGA : 


Sales and Servicing- 
Graham Cheer 


Whitcoulls Ltd ph. 


97 Grey St 
TE PUK] 


May & Associates ph, 


P.0.Box 345. 
TIMARU 


Whitcoulls Ltd. ch. 


182 Stafford St, 
Timary 


WANGANU] 


Whitcoulls Ltd, ph. 


{48 Victoria Ave 
WELLINGTON: 


Servicing: 
APTEC 


BBC are as 


86-063 


7365 


298 7769 


87-738 


83-237 


88-185 


94-393 


(Applied Engineering and Technology) 
3 Halleys Lane ph. 850-811 


Dealers- 
Whitcoulls Ltd, 


312 Laapton Quay ph. 


850-808 


724-921 
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USER GROUP MEETINGS 


AUCKLAND : “meets 2nd Wednesday of the month, 7.30pm, Conference Rooms, 
Auckland Secondary Teachers College,60 Epsom Ave, Epsom. ph 
Dave 770-630 x 518(bus) or Kerry 695-355. 
“North Shore: meets last Wednesday of the month, 7.30pm, 
Salvation Army Hall, Glenfield Road, Glenfield ph Chris 
419-0543 (wk) 


CHRISTCHURCH: “fortnightly workshops, Monday 6.30pm at Hagley High School. 
ph. Michael 582-267, 

DUNEDIN: -first Thursday of the month, Phone Martin McDowall 42-03) 

HAWKES BAY: “Alternative months Hastings & Napier. Contact Kendall Napier 


435-624, Bob Taradale 446-955, Mitch Hastings 778-235. 
INVERCARGILL: -Phone Evan 330-444 Invercargill. 
PALMERSTON NORTH: -Phone Tom Skinner 83-009(wk) 


ROTORUA: -Phone lan 85-583 or Joan 81-536 (independent group) 

TAUPO: “meets every second Wednesday @ 7pm. Contact David 84-215 ¢h), 
85-124 (wk), 

TAURANGA : “every second Wednesday. ph. Chris & Jane 65-076, 

TIMARU: -Phone Lloyd van der Krogt Timaru 61-432, 

TOKOROA: “fst Friday of month, ‘.30pm, Tokoraa High School. Contacts 
Don Fraser, 68-833 or Graeme Robertson, 65-344 Tokoroa. 

WAIKATO: “First Monday of the month 7.30pm Watkata Tech Institute. Ph. 

Alison or John, Morrinsyille 6695, 
WELLINGTON: “meets. usually second WEDNESDAY of the month, 7.30pm, Royal 


Society Lecture Theatre, Turnbull St, Thorndon. Other dates 
advised in Beeblet regional news.(May p.39) 
“Workshops: fourth Wednesday of month, other venues. ph. Don 
848-239 or Mike 785-437, 
OTHER CENTRES:  - let us Know and we will publish details here. 
THE NEWSLETTER: 
CONTRIBUTIONS :-most welcome, Listings should be sent in on tape or disc. (Tape 
- 2 copies, one at 300 baud please). Please include written explanation of 
listings text and graphics only material welcome too. 
DEADLINES:- For a particular issue, the last day for material is the last day of 
the month prior to publication. 
ADVERTISING:- Rates are $20 per half page (camera ready), deadline as above, 


Copyright <c) BBC/ACORN COMPUTER USER GROUP OF NZ INC. Published monthly except 
January and mailed to financial members. Registered Publication with NZPO 
MEMBERSHIP: 

Nembership of the users group is on payment of an annual subscription from April 
to March. For the 1986/7 year it is: $30.00, plus $5.00 for Wellington members 
as a local branch levy, which entitles attendance at meetings as detailed above. 
Joining or renewing members get all the back issues of the current year - those 
Joining from 1 October may have half the annual sub waived and only receive 
newsletters from J] October, 


THE BBC/ACORN COMPUTER USER GROUP OF NZ INC, P.0.Box 9592, WELLINGTON. 
Reproduced by BRYCE FRANCIS LTD ,WELLINGTON 


